is_symmetric Function

public pure function is_symmetric(a) result(rst)

Tests to see if a matrix is symmetric.

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=real64),	intent(in),		dimension(:,:)	::	a	The matrix to test.

Return Value logical

True if the matrix is symmetric; else, false.

Contents